home *** CD-ROM | disk | FTP | other *** search
-
- if (0) { print <<ENDOFDOCZHEADER ;
- ****************************************************************************
- .MODULE frank
- .LIBRARY util
- .TYPE program
- .LANGUAGE perl
- .APPLICATION system
- .SYSTEM unix
- .AUTHOR Paul Anderson
- .DESCRIPTION
- Perl data processing program
- .ARGUMENTS
- frank <source_dir> <target_dir>
- .NARRATIVE
- The frank program will do thus and such in a very dynamic
- fashion from source_dir to target-dir.
- .RETURNS
- 0 on good exit, !0 on failure.
- .ENDOC END DOCUMENTATION
- ****************************************************************************
- ENDOFDOCZHEADER
- };
-
- print "Hello, World!\n";
-
- exit(0);
-
-